home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / comp / forstmnt.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  406 b   |  17 lines
  1. /*
  2.                                 F O R S T M N T . C
  3. */
  4.  
  5. #include "iccomp.h"
  6.  
  7. ESTRUC_ *for_stmnt(init, cond, inc, stmnt)
  8.     ESTRUC_
  9.         *init,
  10.         *cond,
  11.         *inc,
  12.         *stmnt;
  13. {
  14.     cat_stmnt(stmnt, inc);                  /* catenate inc to stmt */
  15.     while_stmnt(cond, stmnt);               /* create while-stmnt */
  16.     return (catcode(init, cond));           /* return final code */
  17. }